From 5933aec024a9b21397467f1661d5cb890637c3a2 Mon Sep 17 00:00:00 2001
From: oliskoli <oliskoli>
Date: Sun, 28 Jan 2007 18:24:16 +0000
Subject: [PATCH] GPS fixes needs a valid parameter (selectable from list).

---
 win32/gui-2/filter.dfm | Bin 8773 -> 8943 bytes
 win32/gui-2/filter.pas |  16 ++++++++++++----
 2 files changed, 12 insertions(+), 4 deletions(-)

diff --git a/win32/gui-2/filter.dfm b/win32/gui-2/filter.dfm
index 6155ca9a7efde2573dbec57d88711aba60ee1416..c7b21a61e0bb448de60ea0297fae4703090473a3 100644
GIT binary patch
delta 181
zcmX@=^4?YOKNmxYTad4tr%#A$5QBlh?Tv!^{G1%gN$vr`X_*z1efhJ++5PjJb25{&
z*?D2YVD97{{PL4M1QaHJ;}2$vW1Q?Q5U9)<;+&tGl<$;Z!JV8BH6yi{#V0kbgsFl#
zB)@>EY;uf@tqHGZNosDfUT{fKW?p(RBO6OzeqJgYb3s8d8%s($kYqAWVPi5%Vc-Z!
SO!6;ENiAZM*gQ*MwIBd@MmQ({

delta 75
zcmaFwdelYmKNmxYTad4tr%#A$5QBk$;YLAyeqNsBq>!S-<ZQRhiqzuCp8VO9PxH$&
cF;z?s;Fq1uB@oQ?ngPtL5ir^8Cb&`%0D=)08UO$Q

diff --git a/win32/gui-2/filter.pas b/win32/gui-2/filter.pas
index dbcdfe31c..396e947e5 100644
--- a/win32/gui-2/filter.pas
+++ b/win32/gui-2/filter.pas
@@ -82,13 +82,14 @@ type
     edWayptRadiusLon: TEdit;
     cbTrackRangeTimeZone: TCheckBox;
     btnHelp: TBitBtn;
-    cbTrackFixes: TCheckBox;
+    cbGPSfix: TCheckBox;
     cbTrackCourse: TCheckBox;
     cbTrackSpeed: TCheckBox;
     gbTransform: TGroupBox;
     cobTransformType: TComboBox;
     cbTransform: TCheckBox;
     cbTransformDelete: TCheckBox;
+    cobGPSfixes: TComboBox;
     procedure cbTrackTimeClick(Sender: TObject);
     procedure FormCreate(Sender: TObject);
     procedure cbTrackTitleClick(Sender: TObject);
@@ -107,6 +108,7 @@ type
       Shift: TShiftState);
     procedure btnHelpClick(Sender: TObject);
     procedure cbTransformClick(Sender: TObject);
+    procedure cbGPSfixClick(Sender: TObject);
   private
     { Private-Deklarationen }
     lTrackTimeList: TList;
@@ -241,9 +243,10 @@ begin
 
   if not(gpsbabel_knows_inifile) then
   begin
-    cbTrackFixes.Enabled := False;
+    cbGPSfix.Enabled := False;
     cbTrackCourse.Enabled := False;
     cbTrackSpeed.Enabled := False;
+    cobGPSfixes.Enabled := False;
   end;
 
   LoadSettingsFromRegistry();
@@ -421,8 +424,8 @@ begin
         Result,
         FormatDateTime('yyyymmddhhnnss', dt)]);
     end;
-    if cbTrackFixes.Checked then
-      Result := Format('%s,fix', [Result]);
+    if cbGPSfix.Checked then
+      Result := Format('%s,fix=%s', [Result, cobGPSfixes.Text]);
     if cbTrackCourse.Checked then
       Result := Format('%s,course', [Result]);
     if cbTrackSpeed.Checked then
@@ -737,4 +740,9 @@ begin
   cobTransformType.Enabled := cbTransform.Checked;
 end;
 
+procedure TfrmFilter.cbGPSfixClick(Sender: TObject);
+begin
+  cobGPSfixes.Enabled := cbGPSfix.Checked;
+end;
+
 end.
-- 
2.30.2